home *** CD-ROM | disk | FTP | other *** search
- global pTheFileName, pTheFileAndPath, gScreenSaverInstalled
-
- on exitFrame me
- if the platform contains "mac" then
- Fobj = 0
- Fobj = xtra("FileXtra3").new()
- theControlFolder = Fobj.fx_FolderGetSpecialPath("kControlPanelFolderType")
- theControlFolder = theControlFolder & pTheFileName
- intVar = Fobj.fx_FileCopy(pTheFileAndPath, theControlFolder)
- if intVar then
- else
- go("error")
- end if
- else
- theFinal = the moviePath & "screensaver\win\" & pTheFileName
- open(theFinal)
- end if
- gScreenSaverInstalled = 1
- Fobj = 0
- startTimer()
- end
-